home *** CD-ROM | disk | FTP | other *** search
/ Stone Design / Stone Design.iso / Stone_Friends / Wave / WavesWorld / Source / IBPalettes / WW3DKit / RIBCommandCell.m < prev    next >
Encoding:
Text File  |  1995-03-22  |  934 b   |  61 lines
  1. // copyright 1993 Michael B. Johnson; some portions copyright 1994, MIT
  2. // see COPYRIGHT for reuse legalities
  3. //
  4.  
  5. #import "RIBCommand.h"
  6. #import "RIBCommandCell.h"
  7.  
  8. @implementation RIBCommandCell
  9.  
  10.  
  11. + initialize { [RIBCommandCell setVersion:1]; return self; }
  12. ////////////////////////////////////////////////////////
  13. //
  14. - init
  15. {
  16.   [super init];
  17.   ribCommand = nil;
  18.  
  19.   return self;
  20. }
  21. - initTextCell:(const char *)aString
  22. {
  23.   [super initTextCell:aString];
  24.   ribCommand = nil;
  25.  
  26.   return self;
  27. }
  28. //
  29. - awake
  30. {
  31.   [super awake];
  32.   return self;
  33. }
  34.  
  35. //
  36. - setRIBCommand:aRIBCommand { ribCommand = aRIBCommand; return self; }
  37. //
  38. - ribCommand { return ribCommand; }
  39.  
  40. - write:(NXTypedStream *)stream 
  41. {
  42.    [super write:stream];
  43.    return self;
  44. }
  45. //
  46. - read:(NXTypedStream *)stream 
  47. {
  48.    int version;
  49.  
  50.    [super read:stream];
  51.  
  52.    version = NXTypedStreamClassVersion(stream, "RIBCommandCell");
  53.    if (version == 1)
  54.    {  
  55.    }
  56.    return self;
  57. }
  58.  
  59.  
  60. @end
  61.